﻿Public Class ProjectFilePropertiesForm

    Property ProjectFile As Project.ProjectFile

    Public Property ClassName As String
        Get
            Return LabelClassName.Text.Replace("ClassName: ", "")
        End Get
        Set(ByVal value As String)
            LabelClassName.Text = "ClassName: " + value
        End Set
    End Property

    Public Property ContainingFolder As String
        Get
            Return LabelDirectory.Text.Replace("Containing Folder: ", "")
        End Get
        Set(ByVal value As String)
            ' Set the destination folder for the link too
            LabelDirectory.Text = "Containing Folder: " + value
        End Set
    End Property

    Public Property FullPath As String
        Get
            Return LabelFullPath.Text.Replace("FullPath: ", "")
        End Get
        Set(ByVal value As String)
            ' Set the destination folder for the link too
            LabelFullPath.Text = "FullPath: " + value
        End Set
    End Property

    Private Sub LinkLabelOpenFolder_LinkClicked(ByVal sender As System.Object, ByVal e As System.Windows.Forms.LinkLabelLinkClickedEventArgs) Handles LinkLabelOpenFolder.LinkClicked
        ProjectFile.OpenPath()
    End Sub

    Private Sub LinkLabelFullPath_LinkClicked(ByVal sender As System.Object, ByVal e As System.Windows.Forms.LinkLabelLinkClickedEventArgs) Handles LinkLabelFullPath.LinkClicked
        ProjectFile.OpenEditor()
    End Sub

End Class